SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
CREATE PROCEDURE [dbo].[paEjecutarBajasDeServiciosDeSuplentesComunes]
@Subservicio INT,
@FechaBaja VARCHAR(10)
 AS

-- ACTUALIZACIONES
-- 25-02-2008 - Se agrego a la Norma, fecha de Registro y Usuario que la Genero
-- 20-10-2008 - Se quito el -1 a la fecha en que baja el servicio y su ultimo subservicio

SET NOCOUNT ON

DECLARE @servicio INT
DECLARE @norma INT
DECLARE @Error INT
DECLARE @IdUsuario INT 

SET @Error = 0

BEGIN TRANSACTION tranBajaDeSuplentesComunes

SET @IdUsuario = dbo.sp_usuario(SYSTEM_USER)

INSERT INTO tb_Normas (descripcion, tiponorma, seimprimio, FechaDeCarga, Usuario) VALUES ('Baja Masiva de Supl. Comunes '+@FechaBaja, 2, 0, GetDate(), @IdUsuario)
SELECT @norma = @@IDENTITY, @Error = @@ERROR
IF @Error <> 0 
	GOTO SALIR

SELECT @servicio = Servicioagente FROM tb_subServiciosAgentes WHERE idSubServicio = @subservicio

-- UPDATE tb_SubServiciosAgentes SET baja='S', fechabaja=DATEADD(DAY, -1, @FechaBaja), normafin=@norma WHERE idSubServicio = @subservicio -- Se saco el -1 a la Fecha 20/10/2008
UPDATE tb_SubServiciosAgentes SET baja='S', fechabaja=@FechaBaja, normafin=@norma WHERE idSubServicio = @subservicio
SELECT @Error = @@ERROR
IF @Error <> 0 
	GOTO SALIR

--UPDATE tb_ServiciosAgentes SET baja = 'S', fechabaja = DATEADD(DAY, -1, @FechaBaja), causabaja=11, normabaja=@norma WHERE idServicioagente = @servicio  -- Se saco el -1 a la Fecha 20/10/2008
UPDATE tb_ServiciosAgentes SET baja = 'S', fechabaja = @FechaBaja, causabaja=11, normabaja=@norma WHERE idServicioagente = @servicio
SELECT @Error = @@ERROR
IF @Error <> 0 
	GOTO SALIR

SALIR:
IF @Error = 0
	COMMIT TRANSACTION tranBajaDeSuplentesComunes
ELSE
	ROLLBACK TRANSACTION tranBajaDeSuplentesComunes
GO
GRANT EXECUTE ON  [dbo].[paEjecutarBajasDeServiciosDeSuplentesComunes] TO [PersonalDocente]
GO
